﻿Public Class PaintbearDrawing
    Private bmp As Bitmap
    Private bmpgraph As Graphics
    Public ReadOnly Property Graphics As Graphics
        Get
            Return bmpgraph
        End Get
    End Property
    Public Sub New(ByVal bitmap As Bitmap)
        If bitmap Is Nothing Then Throw New ArgumentNullException("bitmap")
        bmp = bitmap
        bmpgraph = Graphics.FromImage(bitmap)
    End Sub
End Class
